home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / puma_ad.zip / PUMADN.SLT next >
Text File  |  1990-02-11  |  665b  |  36 lines

  1. //
  2. //  Module:       pumad.slt
  3. //  Version:      1.0
  4. //  Description:  PUMA protocol download script for Telix
  5. //                Includes appropriate port, speed, and download directory in
  6. //                the PUMA command-line.
  7. //  Author:       Paul Roub
  8. //
  9.  
  10. //<f>
  11. main()
  12. {
  13.   str     CmdLine[128];
  14.   str     BaudStr[7];
  15.   str     PortStr[2];
  16.  
  17.   itos(get_baud(), BaudStr);
  18.   itos(get_port(), PortStr);
  19.  
  20.   CmdLine = "P";
  21.   strcat(CmdLine, PortStr);
  22.  
  23.   strcat(CmdLine, " S");
  24.   strcat(CmdLine, BaudStr);
  25.  
  26.   strcat(CmdLine, " A+");
  27.  
  28.   strcat(CmdLine, " R ");
  29.   strcat(CmdLine, _down_dir);
  30.  
  31.   run("puma", CmdLine, 0);
  32.  
  33.   return;
  34. }
  35.  
  36.